perm filename FRPOLY.TIM[TIM,LSP]1 blob sn#657793 filedate 1982-05-06 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00009 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	 SAIL
C00004 00003	 Franz on a 780 (Old version superceded later in this file)
C00005 00004	 Multics
C00007 00005	 780 Franz
C00009 00006	 UTEXAS20 running UCI-LISP
C00014 00007	 UTLISP 5.1
C00019 00008	 ELISP/UCILISP
C00021 00009	 Texas UCILISP
C00025 ENDMK
C⊗;
;;; SAIL
(setup)
(Z 11.0 0 (Y 1 1.0 0 (X 1 1.0 0 1.0))) 
(setq base 10. ibase 10.)¬
10. 
(bench 2.)
(POWER= 2. (7.0E-3 0.0 0.0166666666) (6.0E-3 0.0 0.0166666666) (7.0E-3 1.0E-3 0.05)) 
(bencH 5.)
(POWER= 5. (0.146 0.096 0.183333334) (0.171 0.094 0.283333335) (0.14 0.09 0.216666667)) 
(bench 10.)¬
(POWER= 10. (1.132 0.588 2.4) (5.145 4.055 9.35) (2,399 1.842 4.75)) 
(bench 15.)
(POWER= 15. (5.884 2.∩35 8.9166666) (41.611 30.642 72.0) (20.687 16.999 47.8166666)) 
(bench 2.)
(POWER= 2. (5.0E-3 0.0 0.0) (5.0E-3 0.0 0.0)  5.0E-3 0.0 0.0 ∩R~∀QE∃]GP@T\R4RBB>↑-⊃u↓Ur↓!A→β!a↓As↓↓A9βAMMM≠→MM%αAA9A;1↓A9α↓A9E*I↓!As⊃ME↓αqEaIβ↓9Ma≠→MMM≠→%%hQ#↔v≠!↓Eαq$4)Eα>↑⊗∪i↓EAr↓!A→+→a↓As↓↓A9KAMMM≠→MQ%αAE9aC	↓A9C⊃↓M9#)%↓↓
qMEEβ↓9]Y2↓I9A31YYY31%%hQ#↔v≠!↓E*q$4)Eα>↑⊗∪i↓EUr↓!Q9#)]↓AqAIU↓:qAaM≠→MM¬αAIe9)↓Eaq	aY↓+99AUJ↓!E]s↓M]↓	→9MEJ↓Ie9CAMMM≠!%%hQ#↔v≠!↓IHh)"B⎇:⊗Iuβ⊃9↓!*qB∃5~↓A9Aβ↓9AE31YYY31Y%↓C)9B∃k→↓A9α↓A9A≠→MMM≠→M%↓C19B∃k→↓A9α↓A9A1YYY31YY%J4)#⊗+;∂!β)$4)Eα>↑⊗∪i↓U9αAA9A#I↓A9α↓A9EJ↓!A9β9]↓As↓↓A9β1YYY31YY%αAA9I≠1↓A9AU↓As!%%hQ#↔v≠!↓Eαq$4)Eα>↑⊗∪i↓EAr↓!A9+!I↓As↓↓E9β	YYY31]%↓C	9eA~↓A9a∪1↓M9∪1YYY31a%↓C	1MMβ↓9]]2↓I9Q1YYY31%%hQ#↔v≠!↓E*q$4)Eα>↑⊗∪i↓EUr↓!Q9+↓Y↓AsAME↓JqIMM≠→MM%αAIe9∪!I↓EBqEeaβ)M9eJ↓!EYsAa↓E~qIIYβ⊃a9aC→MMM"I%4P1mmZα≠KπwQβ?9ε	↓]aα↓"?3"β[↔K≡K?9β∨+C↔K≡+∪↔⊃εcπS↔∩β'9β&C'Mβ6K3∃$hP4)m[Yα~B|beβ∂}kC'3.!βS'n+M↓#f{π⊃↓j↓M9UHh(4)G≠↔SWαH4)"R↓E↓Es↓↓A↓EI↓E↓
qA↓AαBa↓Eβ	9A↓α↓E9AJI%4RC↔;≡A↓I$hQ"B><*Iu↓∩↓!A9β	]↓As↓%↓!αqAE]β↓9A%αAA9A1↓A9αI%4RC↔;≡A↓U$hQ"B><*Iu↓*↓!A9	Y↓As↓%↓!
qMMQβ	9Aa"I↓!As	U↓As↓%%hQ#↔v≠!↓EαH4)"∧z↑⊗Ij↓EA↓C⊃9UM"↓E9aJ↓!Ees9MM↓99EU
I↓!asIaM↓:qeAEJI4)F∪↔;∂B↓EU$hQ"B><*Iu↓)↓!E2qYU↓BqaMIJ↓!EE∩qUEYβAe9IKA%↓!3→9e↓+19]QJI%4P1mmZα7W3&K∂L4RCO↔S/↓$4)GQ↓E↓
qA↓AαCe↓Eβ	9A↓α↓#a↓
↓E9Aβ↓↓E9αI%$4RC↔;≡A↓I$hQ#C?>+Iu↓∩↓!A9β	YYe∩↓A9AJ↓!A9β	UEE"↓A9AJ↓!A9β	U]I*↓A9AJH4)#⊗+;∂!β)$4)Gβ?←↔∪i↓U↓C↓9EUβ!eE↓αqA%↓C↓9IE∪!Ia↓αqA%↓C↓9EU#)Ya↓αqA%$hQ#↔v≠!↓EαI↓↓mk@4)#ε{←↔Ij↓EA↓C↓9eYC⊃Ma↓αqEaQC	Y%↓C	9]E+9Y↓As→ae]∪1%↓!αqee]3	Aeeβ↓9Ea;AM]%Hh)#.s∂!↓↓9%↓↑#↔∂'n04)Gβ?←↔∪i↓EIαAI9Aβ↓]eYβ↓9QA+→QE%αAM9U3IeeYβ↓9aaβ⊃Ie%αAE9aC→EAaβ↓9IM!Ue%Hh)#.s∂!↓)%↓o}≠Sπ1βi↓EMph)#C␈;↔Iuβ	U↓!2qUYMβ1]↓Es	QaeKA%↓!→9EYC9AQ↓∩qUEU#1e%↓C19Ye#A]M↓
qEUU≠AY%$hQ#↔v≠!↓E*q%↓o&+∂'7∞`4)#ε{←↔Ij↓E]↓C	I9U≠⊃YAaβ	9aUCIY%↓C⊃]9U3AUEaβ)9Me	Ie%αAEI93→YaI2↓E9a3↓eeUJH4)#∂+'Q$hP4+#o(4(4TkW3SN≠M↓M*qC¬1εc?π⊃β!I9A{	IA9βY↓QIπ+O↔K~a↓I]εK;S↔⊗∂S'6)1↓E∩β∪π↔n{;M8hRπO.sS↔∃π+O↔K~↓E=MαA-Iα49$4(hP;;; 780 Franz

Here are the results or running the pairs benchmark on Franz Lisp on 
a VAX 11/780 runing Berkeley 4BSD Unix.  The load average was less
than one when the timing was done.  These results supersede the timings
you have which were made by us in March.


-> (setup)
(z 1 1.0 0 (y 1 1.0 0 (x 1 1.0 0 1.0)))
-> (bench 2)
(power= 2 (0.0167 0.0) (0.0333 0.0) (0.0 0.0))
-> (bench 5)
(power= 5 (0.15 0.0) (0.75 0.4333) (0.3833 0.2166))
-> (bench 10)
(power= 10 (2.8167 1.05) (8.2333 3.3) (3.2 1.2333))
-> (bench 15)
(power= 15 (18.2333 5.35) (92.0333 41.6333) (18.8 5.1333))
-> 
script done on Fri Apr 24 06:07:48 1981

;;; UTEXAS20 running UCI-LISP

(Times are in the form R+G where R is the runtime (not including GC time)
and G is the GC time.  All times are in seconds.  "Interp" means interpreted,
"Slow" means compiled but using UUO-links, "Fast" means compiled with the UUO
links replaced by direct jumps.)


				   Processor
Program			KL-2060			KI-1060
	   Interp	Slow	  Fast	     Interp	  Slow		Fast

FRPOLY:
 Free:			 100000.		75000.
(bench	 0.719+0     0.142+0	0.043+0	     2.627+0	 0.576+0     0.181+0
  2)	 0.677+0     0.142+0	0.047+0	     2.619+0	 0.545+0     0.168+0
First	 0.677+0     0.141+0	0.042+0	     2.698+0	 0.580+0     0.166+0
 result	 0.687+0     0.140+0	0.043+0			 0.612+0     0.155+0
	----------------------------------------------------------------------
Third	 0.706+0     0.162+0	0.063+0	     2.585+0	 0.630+0     0.256+0
 result	 0.830+0     0.164+0	0.063+0	     2.798+0	 0.610+0     0.227+0
	 0.702+0     0.162+0	0.062+0	     2.733+0	 0.695+0     0.252+0
	 0.700+0     0.162+0	0.065+0			 0.593+0     0.215+0
	======================================================================
(bench	 5.88+0      1.166+0	0.343+0	    22.25+0	 4.384+0     1.451+0
  5)	 5.696+0     1.142+0	0.355+0     21.87+0	 4.462+0     1.297+0
First	 5.706       1.146+0	0.338+0			 4.719+0     1.500+0
 result		     1.18+0	0.351+0
	----------------------------------------------------------------------
Third	 5.891+0     1.343+0	0.523+0	    23.04+0	 4.964+0     2.097+0
 result	 5.880+0     1.383+0	0.51+0	    21.64+0	 5.084+0     2.065+0
	 5.884+0     1.345+0	0.522+0			 5.093+0     2.048+0
		     1.341+0	0.514+0
	======================================================================
(bench	122.2+1.1   25.48+1.02  8.63+1.04	--          --	    31.91+2.12
  10)		    25.14+0.98	8.42+1.02
First		    25.53+1.03	8.47+1.01
	----------------------------------------------------------------------
Third	126.4+2.2   28.17+2.02 11.57+2.04	--	    --	    39.07+6.07
 result		    28.26+2.03 11.54+2.04
		    28.18+2.04 11.28+1.98
	======================================================================
(bench	  --	    39.22+2.16 12.59+2.00	--	    --		--
  15)			       12.98+2.06
First
	----------------------------------------------------------------------
Third	  --	    43.46+3.08 17.22+3.02	--	    --		--
 result			       17.58+3.05
	======================================================================

Note:  The results referred to as the first result is the result obtained
as the first value returned by BENCH.  This is the value computed using
integer coefficients.  The result referred to as the third result is the
third value returned by BENCH (for real number coefficients).  UCI Lisp
does not have the bignum package so it could not compute the second
result returned by the BENCH routine.

-------

;;; UTLISP 5.1
Following are the results for FRPOLY under UTLISP 5.1.  The runs at
75000 (octal) were run interactively; the remainder were submitted
as batch jobs. "runtime" does NOT include "gctime".

Interpreted:

bench 2: (runtime+gctime)

R:     1.168+0     1.168+0     1.149+0     1.147+0
R2:    1.181+0     1.162+0     1.171+0     1.174+0
R3:    1.175+0     1.170+0     1.171+0     1.179+0

bench 5: (runtime over gctime)

R:     9.910       9.917       9.868       9.904
        .156        .145        .152        .148
R2:    5.237       5.261       5.245       5.237
        .162        .156        .157        .156
R3:    9.930       9.899       9.960       9.927
        .323        .315        .311        .300

bench 10:

R:   213.160
       4.205
R2:    7.136
        .168
R3:  213.650
       3.994

bench 2 and bench 5 were run at a field length (= core size) of
75000 (octal) words with:  free space of 7500. words
                           full space of 2583. words
bench 2 required no garbage collections; bench 3 required 4 garbage
collections for each run.

bench 10 was run at a field length of 200000 (octal) words with:
                           free space of 41706. words
                           full space of 6685. words
bench 10 required 38 garbage collections.
For obvious reasons, I did not run bench 15.


Compiled:

bench 2:

R:      .173        .139        .153        .149
       0.          0.           .108       0.
R2:     .165        .167        .156        .150
       0.           .115       0.          0.
R3:     .155        .154        .165        .183
       0.          0.          0.          0.

bench 5:

R:     1.406       1.361       1.353       1.327
        .328        .356        .366        .385
R2:     .897        .872        .857        .861
        .159        .253        .257        .260
R3:    1.430       1.372       1.382       1.375
        .325        .395        .396        .269

bench 10:

R:    30.043      30.009      30.016
       3.989       3.866       4.010
R2:    1.219       1.172       1.218
        .143        .179        .155
R3:   30.495      30.509      30.528
       4.015       3.896       3.916

bench 15:

R:    46.046      46.030
       7.346       7.330
R2:    2.120       2.122
        .171        .174
R3:   46.945      46.736
       7.077       7.264

bench 2 and bench 5 were run at a field length of 75000 (octal)
words with:  free space of 14177. words
             full space of 1554. words
bench 2 required 0 or 1 garbage collections per run; bench 5
required 7 to 8 garbage collections per run.

bench 10 and bench 15 were run at a field length of 200000 (octal)
words with:  free space of 42913. words
             full space of 6859. words
bench 10 required 37 garbage collections per run; bench 15 required
63 garbage collections.

As you can see from the R2 results, there are times when a 60 bit word
size can come in handy.
-------

;;; ELISP/UCILISP
Note that in BENCH, the middle numbers are missing, as we don't have
BIGNUM's.  All numbers are in seconds.  The ones in () are for GC.

In Elisp, all final calls are turned into jumps.  A tailrecursive
function does in fact turn into a loop.  I think the R/UCI compiler does
the same, but I am not as familiar with at.  (As you may know, the Elisp
compiler is a modified Utah PSL compiler from about a year ago.)

Elisp

(bench 10)   .893 (0)	   1.018 (0)
(bench 15)  4.919 (.809)   4.416 (.221)

R/UCI Lisp, NOUUO

(bench 10)   1.137 (.276)    2.658 (1.404)
(bench 15)   7.162 (2.926)  20.208 (14.453)
-------

;;; Texas UCILISP
∂06-May-82  0129	Mabry Tyson <Tyson at SRI-AI> 	FRPOLY results for UCI Lisp  
Date:  6 May 1982 0127-PDT
From: Mabry Tyson <Tyson at SRI-AI>
Subject: FRPOLY results for UCI Lisp
To: rpg at SU-AI

Results on FRPOLY for UCILISP (version from University of Texas at Austin
running on SRI-AI TOPS-20).  Running with the TOPS-10/TOPS-20 compatibility
package.

Notes relevent to this problem:  UCILSP does not have bignums.  (The hooks are
there but I know of no source that uses them.)   All arithmetic operations
are generic and are NOT compiled in-line.  The times reported are CPU times
and the first time (the total) includes the second time (the GC time).
The only non-syntactic change to the source was to change the divisor for
the time computation from 1000000.0 to 1000.0 since UCILSP reports times in
milliseconds.

Interpreted (Macros expanded once only):
(bench 2)
(POWER= 2 (0.58200000 0.00000000) ? (0.67300000 0.00000000))
(bench 5)
(POWER= 5 (6.0660000 0.00000000) ? (6.1940000 0.00000000))

Compiled without fast links (and that includes calls to arithmetic functions):
Interpreted (Macros expanded once only):
(bench 2)
(POWER= 2 (0.58200000 0.00000000) ? (0.67300000 0.00000000))
(bench 5)
(POWER= 5 (6.0660000 0.00000000) ? (6.1940000 0.00000000))

Compiled without fast links (and that includes calls to arithmetic functions):
(bench 2)
(POWER= 2 (0.84000000E-1 0.00000000) ? (0.90000000E-1 0.00000000))
(bench 5)
(POWER= 5 (0.93900000 0.00000000) ? (1.0160000 0.00000000))
(bench 10)
(POWER= 10 (19.273000 1.1050000) ? (19.655000 1.0580000))
(bench 15)
(POWER= 15 (31.048000 2.1530000) ? (33.469000 3.2140000))

Compiled with fast links:
(bench 2)
(POWER= 2 (0.18000000E-1 0.00000000) ? (0.23000000E-1 0.00000000))
(bench 5)
(POWER= 5 (0.20800000 0.00000000) ? (0.27900000 0.00000000))
(bench 10)
(POWER= 10 (5.5870000 1.0570000) ? (6.3900000 1.0760000))
(bench 15)
(POWER= 15 (9.1310000 2.0910000) ? (11.560000 3.1940000))
-------